home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / programr / ptrp25dm.zip / TEST19.TRP < prev    next >
Text File  |  1995-01-17  |  211b  |  9 lines
  1. var
  2.         globVar : string = "This is a global var";
  3. endvar
  4.  
  5. procedure main
  6.         writeln(globVar);
  7.         writeln(debug, "This is a debug string"); // write to the pre-defined debug device
  8. endproc
  9.